home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 01 - 1984 & 1985 / 01.08 Jul 85.sit / 01.08 Jul 85 / C FR Example Vol. 1 #8 / DoProc.ASM next >
MacBinary  |  1985-05-11  |  1.8 KB  |  [TEXT/EDIT]

open in: MacOS 8.1     |     Win98     |     DOS

browse contents    |     view JSON data     |     view as text


This file was processed as: MacBinary (archive/macBinary).

ConfidenceProgramDetectionMatch TypeSupport
10% dexvert MacBinary (archive/macBinary) fallback Supported
1% dexvert Text File (text/txt) fallback Supported
100% file MacBinary II, inited, Sat May 11 10:23:00 1985, modified Sat May 11 10:23:00 1985, creator Macintosh Edit, type ASCII, 1140 bytes "DoProc.ASM" , at 0x4f4 490 bytes resource default (weak)
99% file data default
74% TrID Macintosh plain text (MacBinary) default
25% TrID MacBinary 2 default (weak)
100% siegfried fmt/1762 MacBinary (II) default
100% lsar MacBinary default


id metadata
keyvalue
macFileType[TEXT]
macFileCreator[EDIT]



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0a 44 6f 50 72 6f 63 | 2e 41 53 4d 00 00 00 00 |..DoProc|.ASM....|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 45 44 49 | 54 01 00 00 00 00 00 00 |.TEXTEDI|T.......|
|00000050| 00 00 00 00 00 04 74 00 | 00 01 ea 99 09 28 44 99 |......t.|.....(D.|
|00000060| 09 28 44 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.(D.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 9e 1e 00 00 |........|........|
|00000080| 3b 2b 0d 3b 09 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |;+.;.***|********|
|00000090| 2a 2a 0d 3b 09 2a 20 44 | 4f 50 52 4f 43 2e 41 53 |**.;.* D|OPROC.AS|
|000000a0| 4d 20 20 2a 0d 3b 09 2a | 2a 2a 2a 2a 2a 2a 2a 2a |M *.;.*|********|
|000000b0| 2a 2a 2a 2a 0d 3b 0d 3b | 20 47 65 6e 65 72 69 63 |****.;.;| Generic|
|000000c0| 20 50 52 4f 43 20 69 6e | 76 6f 6b 65 72 2e 0d 3b | PROC in|voker..;|
|000000d0| 0d 3b 20 49 6e 70 75 74 | 73 3a 0d 3b 09 44 30 2e |.; Input|s:.;.D0.|
|000000e0| 57 09 3d 20 52 65 73 6f | 75 72 63 65 20 49 44 20 |W.= Reso|urce ID |
|000000f0| 6f 66 20 50 52 4f 43 0d | 3b 09 4f 74 68 65 72 20 |of PROC.|;.Other |
|00000100| 44 2d 72 65 67 73 20 63 | 6f 6e 74 61 69 6e 20 61 |D-regs c|ontain a|
|00000110| 72 67 73 20 66 6f 72 20 | 70 72 6f 63 0d 3b 0d 3b |rgs for |proc.;.;|
|00000120| 09 2a 2a 2a 20 57 41 52 | 4e 49 4e 47 20 2a 2a 2a |.*** WAR|NING ***|
|00000130| 0d 3b 0d 3b 09 48 61 6e | 64 6c 65 73 20 37 20 61 |.;.;.Han|dles 7 a|
|00000140| 72 67 73 20 4d 41 58 21 | 21 0d 3b 0d 3b 20 45 64 |rgs MAX!|!.;.; Ed|
|00000150| 69 74 73 3a 0d 3b 09 32 | 35 2d 41 70 72 2d 38 35 |its:.;.2|5-Apr-85|
|00000160| 20 52 42 44 09 43 72 65 | 61 74 65 64 0d 3b 0d 3b | RBD.Cre|ated.;.;|
|00000170| 2d 0d 09 09 49 6e 63 6c | 75 64 65 09 4d 61 63 54 |-...Incl|ude.MacT|
|00000180| 72 61 70 73 2e 44 0d 0d | 09 58 44 45 46 09 44 6f |raps.D..|.XDEF.Do|
|00000190| 50 72 6f 63 0d 0d 44 6f | 50 72 6f 63 3a 0d 09 4d |Proc..Do|Proc:..M|
|000001a0| 6f 76 65 4d 2e 4c 09 61 | 31 2d 61 35 2c 2d 28 73 |oveM.L.a|1-a5,-(s|
|000001b0| 70 29 09 09 3b 20 4a 75 | 73 74 20 69 6e 20 63 61 |p)..; Ju|st in ca|
|000001c0| 73 65 20 2e 2e 2e 0d 09 | 43 6c 72 2e 4c 09 2d 28 |se .....|Clr.L.-(|
|000001d0| 73 70 29 09 09 09 3b 20 | 47 65 74 73 20 68 61 6e |sp)...; |Gets han|
|000001e0| 64 6c 65 20 74 6f 20 50 | 52 4f 43 0d 09 4d 6f 76 |dle to P|ROC..Mov|
|000001f0| 65 2e 4c 09 23 27 50 52 | 4f 43 27 2c 2d 28 73 70 |e.L.#'PR|OC',-(sp|
|00000200| 29 09 09 3b 20 52 65 73 | 6f 75 72 63 65 20 74 79 |)..; Res|ource ty|
|00000210| 70 65 0d 09 4d 6f 76 65 | 2e 57 09 64 30 2c 2d 28 |pe..Move|.W.d0,-(|
|00000220| 73 70 29 09 09 3b 20 52 | 65 73 6f 75 72 63 65 20 |sp)..; R|esource |
|00000230| 49 44 0d 09 5f 47 65 74 | 52 65 73 6f 75 72 63 65 |ID.._Get|Resource|
|00000240| 09 09 09 3b 20 4c 6f 61 | 64 20 72 65 73 6f 75 72 |...; Loa|d resour|
|00000250| 63 65 0d 09 4d 6f 76 65 | 2e 4c 09 28 73 70 29 2b |ce..Move|.L.(sp)+|
|00000260| 2c 64 30 09 09 3b 20 44 | 30 20 2d 3e 2d 3e 20 50 |,d0..; D|0 ->-> P|
|00000270| 52 4f 43 3f 20 28 6e 65 | 65 64 20 74 65 73 74 29 |ROC? (ne|ed test)|
|00000280| 0d 09 42 65 71 09 40 31 | 30 09 09 09 3b 20 28 64 |..Beq.@1|0...; (d|
|00000290| 69 64 6e 27 74 20 67 65 | 74 20 69 74 21 29 0d 09 |idn't ge|t it!)..|
|000002a0| 4d 6f 76 65 2e 4c 09 64 | 30 2c 61 30 09 09 09 3b |Move.L.d|0,a0...;|
|000002b0| 20 41 30 20 2d 3e 2d 3e | 20 50 52 4f 43 0d 09 4d | A0 ->->| PROC..M|
|000002c0| 6f 76 65 4d 2e 4c 09 64 | 31 2d 64 36 2c 2d 28 73 |oveM.L.d|1-d6,-(s|
|000002d0| 70 29 09 09 3b 20 53 61 | 76 65 20 64 2d 70 61 72 |p)..; Sa|ve d-par|
|000002e0| 61 6d 65 74 65 72 73 0d | 09 4d 6f 76 65 4d 2e 4c |ameters.|.MoveM.L|
|000002f0| 09 28 73 70 29 2b 2c 64 | 30 2d 64 35 09 09 3b 20 |.(sp)+,d|0-d5..; |
|00000300| 52 65 73 74 6f 72 65 20 | 70 61 72 61 6d 65 74 65 |Restore |paramete|
|00000310| 72 73 20 73 68 69 66 74 | 65 64 20 69 6e 20 72 65 |rs shift|ed in re|
|00000320| 67 27 73 0d 09 4d 6f 76 | 65 2e 4c 09 34 28 73 70 |g's..Mov|e.L.4(sp|
|00000330| 29 2c 64 36 09 09 3b 20 | 47 65 74 20 6e 65 78 74 |),d6..; |Get next|
|00000340| 20 70 61 72 61 6d 65 74 | 65 72 0d 09 4d 6f 76 65 | paramet|er..Move|
|00000350| 2e 4c 09 61 30 2c 2d 28 | 73 70 29 09 09 3b 20 53 |.L.a0,-(|sp)..; S|
|00000360| 61 76 65 20 68 61 6e 64 | 6c 65 20 74 6f 20 50 52 |ave hand|le to PR|
|00000370| 4f 43 0d 09 42 73 65 74 | 2e 42 09 23 37 2c 28 61 |OC..Bset|.B.#7,(a|
|00000380| 30 29 09 09 09 3b 20 4c | 6f 63 6b 20 69 74 20 64 |0)...; L|ock it d|
|00000390| 6f 77 6e 0d 09 4d 6f 76 | 65 2e 4c 09 28 61 30 29 |own..Mov|e.L.(a0)|
|000003a0| 2c 61 30 09 09 09 3b 20 | 41 30 20 2d 3e 20 50 52 |,a0...; |A0 -> PR|
|000003b0| 4f 43 27 73 20 65 6e 74 | 72 79 0d 09 4a 73 72 09 |OC's ent|ry..Jsr.|
|000003c0| 28 61 30 29 09 09 09 3b | 20 43 61 6c 6c 20 70 65 |(a0)...;| Call pe|
|000003d0| 72 72 6f 72 0d 09 4d 6f | 76 65 2e 4c 09 28 73 70 |rror..Mo|ve.L.(sp|
|000003e0| 29 2b 2c 61 30 09 09 3b | 20 41 30 20 2d 3e 2d 3e |)+,a0..;| A0 ->->|
|000003f0| 20 50 52 4f 43 0d 09 42 | 63 6c 72 2e 42 09 23 37 | PROC..B|clr.B.#7|
|00000400| 2c 28 61 30 29 09 09 09 | 3b 20 55 6e 6c 6f 63 6b |,(a0)...|; Unlock|
|00000410| 20 74 68 65 20 50 52 4f | 43 0d 09 4d 6f 76 65 4d | the PRO|C..MoveM|
|00000420| 2e 4c 09 28 73 70 29 2b | 2c 61 31 2d 61 35 09 09 |.L.(sp)+|,a1-a5..|
|00000430| 3b 20 52 65 73 74 6f 72 | 65 20 61 2d 72 65 67 73 |; Restor|e a-regs|
|00000440| 0d 09 52 74 73 09 09 09 | 09 3b 20 52 65 74 75 72 |..Rts...|.; Retur|
|00000450| 6e 20 50 52 4f 43 27 73 | 20 44 30 0d 09 09 0d 40 |n PROC's| D0....@|
|00000460| 31 30 3a 09 4d 6f 76 65 | 2e 57 09 23 31 2c 2d 28 |10:.Move|.W.#1,-(|
|00000470| 73 70 29 09 09 3b 20 53 | 79 73 42 65 65 70 28 31 |sp)..; S|ysBeep(1|
|00000480| 29 0d 09 5f 53 79 73 42 | 65 65 70 0d 09 4d 6f 76 |).._SysB|eep..Mov|
|00000490| 65 2e 57 09 23 31 2c 2d | 28 73 70 29 0d 09 5f 53 |e.W.#1,-|(sp).._S|
|000004a0| 79 73 42 65 65 70 0d 09 | 4d 6f 76 65 2e 57 09 23 |ysBeep..|Move.W.#|
|000004b0| 31 2c 2d 28 73 70 29 0d | 09 5f 53 79 73 42 65 65 |1,-(sp).|._SysBee|
|000004c0| 70 0d 09 4d 6f 76 65 4d | 2e 4c 09 28 73 70 29 2b |p..MoveM|.L.(sp)+|
|000004d0| 2c 61 31 2d 61 35 09 09 | 3b 20 52 65 73 74 6f 72 |,a1-a5..|; Restor|
|000004e0| 65 20 61 2d 72 65 67 73 | 0d 09 52 74 73 0d 09 0d |e a-regs|..Rts...|
|000004f0| 09 45 4e 44 00 00 00 00 | 00 00 00 00 00 00 00 00 |.END....|........|
|00000500| 00 00 01 00 00 00 01 16 | 00 00 00 16 00 00 00 d4 |........|........|
|00000510| 3a 50 54 2e 41 53 4d 20 | 23 23 23 0d 0d 20 41 6e |:PT.ASM |###.. An|
|00000520| 64 69 2e 4c 20 23 24 46 | 46 46 46 46 46 2c 61 30 |di.L #$F|FFFFF,a0|
|00000530| 0a 44 6f 50 72 6f 63 2e | 41 53 4d 6f 02 00 00 00 |.DoProc.|ASMo....|
|00000540| 54 45 58 54 45 44 49 54 | 01 00 00 80 00 00 00 00 |TEXTEDIT|........|
|00000550| 00 00 54 45 58 54 45 44 | 49 54 01 00 00 80 00 00 |..TEXTED|IT......|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 98 f0 2d 13 00 00 | 04 74 00 00 01 ea 65 6c |....-...|.t....el|
|00000580| 3a 20 50 52 45 46 49 58 | 0d 09 53 49 47 4e 41 4c |: PREFIX|..SIGNAL|
|00000590| 3d 31 3a 31 32 32 0d 09 | 4c 4d 55 4c 53 3d 31 3a |=1:122..|LMULS=1:|
|000005a0| 31 33 38 0d 09 4c 4d 55 | 4c 55 3d 31 3a 31 35 45 |138..LMU|LU=1:15E|
|000005b0| 0d 09 4c 44 49 56 53 3d | 31 3a 31 37 38 0d 09 4c |..LDIVS=|1:178..L|
|000005c0| 44 49 56 55 3d 31 3a 31 | 41 30 0d 09 4c 4d 4f 44 |DIVU=1:1|A0..LMOD|
|000005d0| 53 3d 31 3a 31 37 38 0d | 09 4c 4d 4f 44 55 3d 31 |S=1:178.|.LMODU=1|
|000005e0| 3a 31 41 30 0d 0d 0d 44 | 65 76 3a 53 79 73 48 65 |:1A0...D|ev:SysHe|
|000005f0| 61 70 0d 0d 09 53 59 53 | 48 45 41 50 3d 31 3a 32 |ap...SYS|HEAP=1:2|
|00000600| 00 00 00 0a 00 09 06 4d | 6f 6e 61 63 6f 80 00 00 |.......M|onaco...|
|00000610| 00 04 00 06 00 08 00 00 | 01 00 00 00 01 16 00 00 |........|........|
|00000620| 00 16 00 00 00 d4 00 00 | ec 1c 00 7a 00 00 00 1c |........|...z....|
|00000630| 00 46 00 01 45 46 4e 54 | 00 00 00 12 45 54 41 42 |.F..EFNT|....ETAB|
|00000640| 00 00 00 1e 03 eb 00 00 | 00 00 00 00 00 01 8a b2 |........|........|
|00000650| 03 ec 00 47 00 00 00 0e | 00 01 8a d2 46 4f 42 4a |...G....|....FOBJ|
|00000660| ff ff ff ff 00 07 67 ca | 00 07 67 f2 00 07 68 1c |......g.|..g...h.|
|00000670| 00 07 68 3c 00 07 68 4e | 00 07 68 60 00 40 01 b6 |..h<..hN|..h`.@..|
|00000680| 00 07 65 ac 00 07 72 92 | 00 07 68 72 00 40 01 be |..e...r.|..hr.@..|
|00000690| 00 40 01 be 00 40 01 be | 00 40 01 be 00 40 01 be |.@...@..|.@...@..|
|000006a0| 00 40 01 46 4f 42 4a ff | ff ff ff 00 07 67 ca 00 |.@.FOBJ.|.....g..|
|000006b0| 07 67 f2 00 07 68 1c 00 | 07 68 3c 00 07 68 4e 00 |.g...h..|.h<..hN.|
|000006c0| 07 68 60 00 40 01 b6 00 | 07 65 ac 00 07 72 92 00 |.h`.@...|.e...r..|
|000006d0| 07 68 72 00 40 01 be 00 | 40 01 be 00 40 01 be 00 |.hr.@...|@...@...|
|000006e0| 40 01 be 00 40 01 be 00 | 40 01 00 00 00 00 00 00 |@...@...|@.......|
|000006f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+